home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 5 / BBS in a Box -Volume V (BBS in a Box) (April 1992).iso / Files / Util / W-Z / WhetBench.cpt / BenchMark.c
MacBinary  |  1988-03-13  |  4.6 KB  |  [TEXT/KAHL]
open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: BenchMark.c

ConfidenceProgramDetectionMatch TypeSupport
66% dexvert Compact Compressed (Unix) (archive/compact) ext Supported
10% dexvert MacBinary (archive/macBinary) fallback Supported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, inited, Sun Mar 13 10:21:15 1988, modified Sun Mar 13 10:21:15 1988, creator Think C, type ASCII, 4105 bytes "BenchMark.c" , at 0x1089 348 bytes resource default (weak)
99% file data default
74% TrID Macintosh plain text (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% siegfried fmt/1762 MacBinary (II) default
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[KAHL]


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 42 65 6e 63 68 4d | 61 72 6b 2e 63 00 00 00 |..BenchM|ark.c...|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4b 41 48 | 4c 01 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 10 09 00 | 00 01 5c 9e 60 59 6b 9e |........|..\.`Yk.|
|00000060| 60 59 6b 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |`Yk.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 1d 91 00 00 |........|........|
|00000080| 2f 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |/*******|********|
|00000090| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2f 0d |********|******/.|
|000000c0| 2f 2a 09 09 09 09 09 09 | 09 09 09 09 09 09 09 09 |/*......|........|
|000000d0| 09 20 2a 2f 0d 2f 2a 20 | 57 68 65 74 53 74 6f 6e |. */./* |WhetSton|
|000000e0| 65 2e 63 20 20 20 20 20 | 43 20 50 72 6f 67 72 61 |e.c     |C Progra|
|000000f0| 6d 20 20 20 20 20 57 68 | 65 74 53 74 6f 6e 65 2e |m     Wh|etStone.|
|00000100| 63 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |c       |        |
|00000110| 20 20 2a 2f 0d 2f 2a 20 | 20 20 20 20 20 20 20 20 |  */./* |        |
|00000120| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000130| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000140| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000150| 20 20 2a 2f 0d 2f 2a 20 | 57 68 65 74 53 74 6f 6e |  */./* |WhetSton|
|00000160| 65 2e 63 20 2d 2d 20 57 | 68 65 74 53 74 6f 6e 65 |e.c -- W|hetStone|
|00000170| 20 42 65 6e 63 68 6d 61 | 72 6b 20 50 72 6f 67 72 | Benchma|rk Progr|
|00000180| 61 6d 20 63 6f 6e 76 65 | 72 74 65 64 20 74 6f 20 |am conve|rted to |
|00000190| 20 20 2a 2f 0d 2f 2a 20 | 20 20 20 4c 69 67 68 74 |  */./* |   Light|
|000001a0| 73 70 65 65 64 43 20 76 | 32 2e 31 33 20 62 79 20 |speedC v|2.13 by |
|000001b0| 42 75 63 6b 20 44 6f 6e | 68 61 6d 20 4d 61 72 63 |Buck Don|ham Marc|
|000001c0| 68 20 27 38 38 2e 20 20 | 57 68 65 74 53 74 6f 6e |h '88.  |WhetSton|
|000001d0| 65 20 2a 2f 0d 2f 2a 20 | 20 20 20 42 65 6e 63 68 |e */./* |   Bench|
|000001e0| 6d 61 72 6b 20 50 72 6f | 67 72 61 6d 20 77 61 73 |mark Pro|gram was|
|000001f0| 20 61 64 61 70 74 65 64 | 20 66 72 6f 6d 20 41 4c | adapted| from AL|
|00000200| 47 4f 4c 20 6c 69 73 74 | 69 6e 67 20 69 6e 20 20 |GOL list|ing in  |
|00000210| 20 20 2a 2f 0d 2f 2a 20 | 20 20 20 46 65 62 20 27 |  */./* |   Feb '|
|00000220| 37 36 20 27 43 4f 4d 50 | 55 54 45 52 20 4a 4f 55 |76 'COMP|UTER JOU|
|00000230| 52 4e 41 4c 27 20 70 70 | 20 34 37 2d 34 39 20 74 |RNAL' pp| 47-49 t|
|00000240| 6f 20 46 6f 72 74 72 61 | 6e 20 49 56 20 26 20 35 |o Fortra|n IV & 5|
|00000250| 20 20 2a 2f 0d 2f 2a 20 | 20 20 20 44 2e 20 46 72 |  */./* |   D. Fr|
|00000260| 61 6e 6b 20 61 6e 64 20 | 46 6f 72 74 72 61 6e 20 |ank and |Fortran |
|00000270| 37 37 20 62 79 20 43 2e | 20 57 68 69 74 65 2e 20 |77 by C.| White. |
|00000280| 20 49 74 20 77 61 73 20 | 72 65 77 72 69 74 74 65 | It was |rewritte|
|00000290| 6e 20 2a 2f 0d 2f 2a 20 | 20 20 20 69 6e 74 6f 20 |n */./* |   into |
|000002a0| 54 4d 4c 20 50 61 73 63 | 61 6c 20 69 6e 20 4d 61 |TML Pasc|al in Ma|
|000002b0| 72 63 68 20 27 38 37 20 | 62 79 20 54 68 6f 6d 61 |rch '87 |by Thoma|
|000002c0| 73 20 52 2e 20 53 68 61 | 77 2e 20 20 20 20 20 20 |s R. Sha|w.      |
|000002d0| 20 20 2a 2f 0d 2f 2a 20 | 20 20 20 20 20 20 20 20 |  */./* |        |
|000002e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000002f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000300| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000310| 20 20 2a 2f 0d 2f 2a 20 | 20 20 20 54 68 69 73 20 |  */./* |   This |
|00000320| 77 61 73 20 72 75 6e 20 | 69 6e 20 63 6f 6d 70 69 |was run |in compi|
|00000330| 6c 65 64 20 4c 69 67 68 | 74 73 70 65 65 64 20 50 |led Ligh|tspeed P|
|00000340| 61 73 63 61 6c 20 61 6e | 64 20 20 20 20 20 20 20 |ascal an|d       |
|00000350| 20 20 2a 2f 0d 2f 2a 20 | 20 20 20 4c 69 67 68 74 |  */./* |   Light|
|00000360| 73 70 65 65 64 43 2c 20 | 75 73 69 6e 67 20 38 30 |speedC, |using 80|
|00000370| 2d 70 6f 69 6e 74 20 70 | 72 65 63 69 73 69 6f 6e |-point p|recision|
|00000380| 2c 20 6f 6e 20 61 20 4d | 61 63 69 6e 6f 73 68 20 |, on a M|acinosh |
|00000390| 20 20 2a 2f 0d 2f 2a 20 | 20 20 20 50 6c 75 73 2e |  */./* |   Plus.|
|000003a0| 20 20 54 68 65 20 72 65 | 73 75 6c 74 20 66 6f 72 |  The re|sult for|
|000003b0| 20 4c 69 67 68 74 73 70 | 65 65 64 20 50 61 73 63 | Lightsp|eed Pasc|
|000003c0| 61 6c 20 77 61 73 20 37 | 2e 34 38 3b 20 66 6f 72 |al was 7|.48; for|
|000003d0| 20 20 2a 2f 0d 2f 2a 20 | 20 20 20 4c 69 67 68 74 |  */./* |   Light|
|000003e0| 73 70 65 65 64 43 2c 20 | 37 2e 34 34 2e 20 20 20 |speedC, |7.44.   |
|000003f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000400| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000410| 20 20 2a 2f 0d 2f 2a 09 | 09 09 09 09 09 09 09 09 |  */./*.|........|
|00000420| 09 09 09 09 09 09 20 2a | 2f 0d 2f 2a 2a 2a 2a 2a |...... *|/./*****|
|00000430| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000440| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000450| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000460| 2a 2a 2a 2a 2a 2a 2a 2a | 2f 0d 20 0d 20 0d 23 69 |********|/. . .#i|
|00000470| 6e 63 6c 75 64 65 20 3c | 23 69 6e 63 6c 75 64 65 |nclude <|#include|
|00000480| 20 66 69 6c 65 73 3a 73 | 74 64 69 6f 2e 68 3e 0d | files:s|tdio.h>.|
|00000490| 23 69 6e 63 6c 75 64 65 | 20 3c 23 69 6e 63 6c 75 |#include| <#inclu|
|000004a0| 64 65 20 66 69 6c 65 73 | 3a 6d 61 74 68 2e 68 3e |de files|:math.h>|
|000004b0| 0d 23 69 6e 63 6c 75 64 | 65 20 3c 4d 61 63 20 23 |.#includ|e <Mac #|
|000004c0| 69 6e 63 6c 75 64 65 73 | 3a 4d 61 63 54 79 70 65 |includes|:MacType|
|000004d0| 73 2e 68 3e 0d 20 0d 74 | 79 70 65 64 65 66 20 64 |s.h>. .t|ypedef d|
|000004e0| 6f 75 62 6c 65 09 65 41 | 72 72 61 79 5b 35 5d 3b |ouble.eA|rray[5];|
|000004f0| 0d 0d 65 41 72 72 61 79 | 09 65 31 3b 0d 64 6f 75 |..eArray|.e1;.dou|
|00000500| 62 6c 65 09 74 3b 0d 64 | 6f 75 62 6c 65 09 74 31 |ble.t;.d|ouble.t1|
|00000510| 3b 0d 64 6f 75 62 6c 65 | 09 74 32 3b 0d 64 6f 75 |;.double|.t2;.dou|
|00000520| 62 6c 65 09 78 3b 0d 64 | 6f 75 62 6c 65 09 79 3b |ble.x;.d|ouble.y;|
|00000530| 0d 64 6f 75 62 6c 65 09 | 7a 3b 0d 64 6f 75 62 6c |.double.|z;.doubl|
|00000540| 65 09 64 74 3b 0d 64 6f | 75 62 6c 65 09 6b 77 68 |e.dt;.do|uble.kwh|
|00000550| 65 74 3b 0d 64 6f 75 62 | 6c 65 09 65 6c 61 70 73 |et;.doub|le.elaps|
|00000560| 65 3b 0d 69 6e 74 09 09 | 69 3b 0d 69 6e 74 09 09 |e;.int..|i;.int..|
|00000570| 6a 3b 0d 69 6e 74 09 09 | 6b 3b 0d 69 6e 74 09 09 |j;.int..|k;.int..|
|00000580| 6c 3b 0d 69 6e 74 09 09 | 6e 32 3b 0d 69 6e 74 09 |l;.int..|n2;.int.|
|00000590| 09 6e 33 3b 0d 69 6e 74 | 09 09 6e 34 3b 0d 69 6e |.n3;.int|..n4;.in|
|000005a0| 74 09 09 6e 36 3b 0d 69 | 6e 74 09 09 6e 37 3b 0d |t..n6;.i|nt..n7;.|
|000005b0| 69 6e 74 09 09 6e 38 3b | 0d 69 6e 74 09 09 6e 39 |int..n8;|.int..n9|
|000005c0| 3b 0d 69 6e 74 09 09 6e | 31 31 3b 0d 6c 6f 6e 67 |;.int..n|11;.long|
|000005d0| 09 73 74 61 72 74 54 69 | 6d 65 3b 0d 6c 6f 6e 67 |.startTi|me;.long|
|000005e0| 09 73 74 6f 70 54 69 6d | 65 3b 0d 63 68 61 72 09 |.stopTim|e;.char.|
|000005f0| 63 68 3b 0d 0d 0d 73 70 | 33 28 78 2c 20 79 2c 20 |ch;...sp|3(x, y, |
|00000600| 7a 29 0d 0d 09 64 6f 75 | 62 6c 65 20 20 78 2c 20 |z)...dou|ble  x, |
|00000610| 79 2c 20 7a 3b 0d 0d 09 | 7b 09 09 0d 09 09 78 20 |y, z;...|{.....x |
|00000620| 3d 20 74 20 2a 20 28 78 | 20 2b 20 79 29 3b 0d 09 |= t * (x| + y);..|
|00000630| 09 79 20 3d 20 74 20 2a | 20 28 78 20 2b 20 79 29 |.y = t *| (x + y)|
|00000640| 3b 0d 09 09 7a 20 3d 20 | 28 78 20 2b 20 79 29 20 |;...z = |(x + y) |
|00000650| 2f 20 74 32 3b 0d 09 7d | 0d 09 0d 09 0d 73 70 61 |/ t2;..}|.....spa|
|00000660| 28 65 29 0d 0d 09 65 41 | 72 72 61 79 20 20 65 3b |(e)...eA|rray  e;|
|00000670| 0d 0d 09 7b 09 09 09 09 | 0d 09 09 6a 20 3d 20 30 |...{....|...j = 0|
|00000680| 3b 0d 09 09 0d 09 09 77 | 68 69 6c 65 20 28 6a 20 |;......w|hile (j |
|00000690| 3c 20 36 29 0d 09 09 09 | 7b 0d 09 09 09 09 65 5b |< 6)....|{.....e[|
|000006a0| 31 5d 20 3d 20 28 65 5b | 31 5d 20 2b 20 65 5b 32 |1] = (e[|1] + e[2|
|000006b0| 5d 20 2b 20 65 5b 33 5d | 20 2d 20 65 5b 34 5d 29 |] + e[3]| - e[4])|
|000006c0| 20 2a 20 74 3b 0d 09 09 | 09 09 65 5b 32 5d 20 3d | * t;...|..e[2] =|
|000006d0| 20 28 65 5b 31 5d 20 2b | 20 65 5b 32 5d 20 2d 20 | (e[1] +| e[2] - |
|000006e0| 65 5b 33 5d 20 2b 20 65 | 5b 34 5d 29 20 2a 20 74 |e[3] + e|[4]) * t|
|000006f0| 3b 0d 09 09 09 09 65 5b | 33 5d 20 3d 20 28 65 5b |;.....e[|3] = (e[|
|00000700| 31 5d 20 2d 20 65 5b 32 | 5d 20 2b 20 65 5b 33 5d |1] - e[2|] + e[3]|
|00000710| 20 2b 20 65 5b 34 5d 29 | 20 2a 20 74 3b 0d 09 09 | + e[4])| * t;...|
|00000720| 09 09 65 5b 34 5d 20 3d | 20 28 2d 65 5b 31 5d 20 |..e[4] =| (-e[1] |
|00000730| 2b 20 65 5b 32 5d 20 2b | 20 65 5b 33 5d 20 2b 20 |+ e[2] +| e[3] + |
|00000740| 65 5b 34 5d 29 20 2a 20 | 74 3b 0d 09 09 09 09 6a |e[4]) * |t;.....j|
|00000750| 20 3d 20 6a 20 2b 20 31 | 3b 0d 09 09 09 7d 0d 09 | = j + 1|;....}..|
|00000760| 7d 0d 0d 0d 6d 61 69 6e | 28 29 0d 09 7b 0d 09 09 |}...main|()..{...|
|00000770| 74 20 20 20 3d 20 30 2e | 34 39 39 39 37 35 3b 0d |t   = 0.|499975;.|
|00000780| 09 09 74 31 20 20 3d 20 | 30 2e 35 30 30 32 35 3b |..t1  = |0.50025;|
|00000790| 0d 09 09 74 32 20 20 3d | 20 32 2e 30 3b 0d 09 09 |...t2  =| 2.0;...|
|000007a0| 0d 09 09 69 20 20 20 3d | 20 31 30 3b 09 09 2f 2a |...i   =| 10;../*|
|000007b0| 20 55 73 65 20 69 20 3d | 20 31 30 20 66 6f 72 20 | Use i =| 10 for |
|000007c0| 77 68 65 74 73 74 6f 6e | 65 20 72 61 74 69 6e 67 |whetston|e rating|
|000007d0| 20 2a 2f 0d 09 09 6e 32 | 20 20 3d 20 31 32 20 2a | */...n2|  = 12 *|
|000007e0| 20 69 3b 0d 09 09 6e 33 | 20 20 3d 20 31 34 20 2a | i;...n3|  = 14 *|
|000007f0| 20 69 3b 0d 09 09 6e 34 | 20 20 3d 20 33 34 35 20 | i;...n4|  = 345 |
|00000800| 2a 20 69 3b 0d 09 09 6e | 36 20 20 3d 20 32 31 30 |* i;...n|6  = 210|
|00000810| 20 2a 20 69 3b 0d 09 09 | 6e 37 20 20 3d 20 33 32 | * i;...|n7  = 32|
|00000820| 20 2a 20 69 3b 0d 09 09 | 6e 38 20 20 3d 20 38 39 | * i;...|n8  = 89|
|00000830| 39 20 2a 20 69 3b 0d 09 | 09 6e 39 20 20 3d 20 36 |9 * i;..|.n9  = 6|
|00000840| 31 36 20 2a 20 69 3b 0d | 09 09 6e 31 31 20 3d 20 |16 * i;.|..n11 = |
|00000850| 39 33 20 2a 20 69 3b 0d | 09 09 0d 09 09 70 72 69 |93 * i;.|.....pri|
|00000860| 6e 74 66 28 22 57 68 65 | 74 73 74 6f 6e 65 20 42 |ntf("Whe|tstone B|
|00000870| 65 6e 63 68 6d 61 72 6b | 20 62 79 20 42 75 63 6b |enchmark| by Buck|
|00000880| 20 44 6f 6e 68 61 6d 5c | 6e 5c 6e 22 29 3b 0d 09 | Donham\|n\n");..|
|00000890| 09 70 72 69 6e 74 66 28 | 22 4c 61 6e 67 75 61 67 |.printf(|"Languag|
|000008a0| 65 3a 20 20 4c 49 47 48 | 54 53 50 45 45 44 20 43 |e:  LIGH|TSPEED C|
|000008b0| 20 20 20 20 20 50 72 65 | 63 69 73 69 6f 6e 3a 20 |     Pre|cision: |
|000008c0| 20 44 4f 55 42 4c 45 5c | 6e 5c 6e 22 29 3b 0d 09 | DOUBLE\|n\n");..|
|000008d0| 09 70 72 69 6e 74 66 28 | 22 43 6f 6d 70 75 74 69 |.printf(|"Computi|
|000008e0| 6e 67 20 57 68 65 74 73 | 74 6f 6e 65 20 c9 5c 6e |ng Whets|tone .\n|
|000008f0| 5c 6e 22 29 3b 0d 0d 09 | 09 73 74 61 72 74 54 69 |\n");...|.startTi|
|00000900| 6d 65 20 3d 20 54 69 63 | 6b 43 6f 75 6e 74 28 29 |me = Tic|kCount()|
|00000910| 3b 0d 09 09 09 2f 2a 20 | 47 65 74 20 73 74 61 72 |;..../* |Get star|
|00000920| 74 69 6e 67 20 74 69 6d | 65 20 2d 20 54 69 63 6b |ting tim|e - Tick|
|00000930| 43 6f 75 6e 74 20 69 73 | 20 61 20 4d 61 63 69 6e |Count is| a Macin|
|00000940| 74 6f 73 68 20 54 6f 6f | 6c 62 6f 78 20 20 2a 2f |tosh Too|lbox  */|
|00000950| 0d 09 09 09 2f 2a 20 63 | 61 6c 6c 20 74 68 61 74 |..../* c|all that|
|00000960| 20 72 65 74 75 72 6e 73 | 20 61 20 63 6f 75 6e 74 | returns| a count|
|00000970| 20 6f 66 20 31 2f 36 30 | 74 68 73 20 6f 66 20 61 | of 1/60|ths of a|
|00000980| 20 73 65 63 6f 6e 64 20 | 66 72 6f 6d 20 2a 2f 0d | second |from */.|
|00000990| 09 09 09 2f 2a 20 74 68 | 65 20 73 79 73 74 65 6d |.../* th|e system|
|000009a0| 20 73 74 61 72 74 75 70 | 20 20 20 20 20 20 20 20 | startup|        |
|000009b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000009c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 2a 2f 0d 09 |        |    */..|
|000009d0| 09 0d 09 09 2f 2a 20 4d | 6f 64 75 6c 65 20 32 20 |..../* M|odule 2 |
|000009e0| 2a 2f 0d 09 09 65 31 5b | 31 5d 20 3d 20 20 31 2e |*/...e1[|1] =  1.|
|000009f0| 30 3b 0d 09 09 65 31 5b | 32 5d 20 3d 20 2d 31 2e |0;...e1[|2] = -1.|
|00000a00| 30 3b 0d 09 09 65 31 5b | 33 5d 20 3d 20 2d 31 2e |0;...e1[|3] = -1.|
|00000a10| 30 3b 0d 09 09 65 31 5b | 34 5d 20 3d 20 2d 31 2e |0;...e1[|4] = -1.|
|00000a20| 30 3b 0d 09 09 0d 09 09 | 66 6f 72 20 28 69 20 3d |0;......|for (i =|
|00000a30| 20 31 3b 20 69 20 3c 3d | 20 6e 32 3b 20 2b 2b 69 | 1; i <=| n2; ++i|
|00000a40| 29 0d 09 09 09 7b 0d 09 | 09 09 09 65 31 5b 31 5d |)....{..|...e1[1]|
|00000a50| 20 3d 20 28 65 31 5b 31 | 5d 20 2b 20 65 31 5b 32 | = (e1[1|] + e1[2|
|00000a60| 5d 20 2b 20 65 31 5b 33 | 5d 20 2d 20 65 31 5b 34 |] + e1[3|] - e1[4|
|00000a70| 5d 29 20 2a 20 74 3b 0d | 09 09 09 09 65 31 5b 32 |]) * t;.|....e1[2|
|00000a80| 5d 20 3d 20 28 65 31 5b | 31 5d 20 2b 20 65 31 5b |] = (e1[|1] + e1[|
|00000a90| 32 5d 20 2d 20 65 31 5b | 33 5d 20 2b 20 65 31 5b |2] - e1[|3] + e1[|
|00000aa0| 34 5d 29 20 2a 20 74 3b | 0d 09 09 09 09 65 31 5b |4]) * t;|.....e1[|
|00000ab0| 33 5d 20 3d 20 28 65 31 | 5b 31 5d 20 2d 20 65 31 |3] = (e1|[1] - e1|
|00000ac0| 5b 32 5d 20 2b 20 65 31 | 5b 33 5d 20 2b 20 65 31 |[2] + e1|[3] + e1|
|00000ad0| 5b 34 5d 29 20 2a 20 74 | 3b 0d 09 09 09 09 65 31 |[4]) * t|;.....e1|
|00000ae0| 5b 34 5d 20 3d 20 28 2d | 65 31 5b 31 5d 20 2b 20 |[4] = (-|e1[1] + |
|00000af0| 65 31 5b 32 5d 20 2b 20 | 65 31 5b 33 5d 20 2b 20 |e1[2] + |e1[3] + |
|00000b00| 65 31 5b 34 5d 29 20 2a | 20 74 3b 0d 09 09 09 7d |e1[4]) *| t;....}|
|00000b10| 0d 0d 09 09 2f 2a 20 4d | 6f 64 75 6c 65 20 33 20 |..../* M|odule 3 |
|00000b20| 2a 2f 0d 09 09 66 6f 72 | 20 28 69 20 3d 20 31 3b |*/...for| (i = 1;|
|00000b30| 20 69 20 3c 3d 20 6e 33 | 3b 20 2b 2b 69 29 0d 09 | i <= n3|; ++i)..|
|00000b40| 09 09 73 70 61 28 65 31 | 29 3b 0d 09 09 09 09 0d |..spa(e1|);......|
|00000b50| 09 09 2f 2a 20 4d 6f 64 | 75 6c 65 20 34 20 2a 2f |../* Mod|ule 4 */|
|00000b60| 0d 09 09 6a 20 3d 20 31 | 3b 0d 09 09 0d 09 09 66 |...j = 1|;......f|
|00000b70| 6f 72 20 28 69 20 3d 20 | 31 3b 20 69 20 3c 3d 20 |or (i = |1; i <= |
|00000b80| 6e 34 3b 20 2b 2b 69 29 | 0d 09 09 09 7b 0d 09 09 |n4; ++i)|....{...|
|00000b90| 09 09 69 66 20 28 6a 20 | 3d 3d 20 31 29 0d 09 09 |..if (j |== 1)...|
|00000ba0| 09 09 09 6a 20 3d 20 32 | 3b 0d 09 09 09 09 65 6c |...j = 2|;.....el|
|00000bb0| 73 65 0d 09 09 09 09 09 | 6a 20 3d 20 33 3b 0d 09 |se......|j = 3;..|
|00000bc0| 09 09 09 09 0d 09 09 09 | 09 69 66 20 28 6a 20 3e |........|.if (j >|
|00000bd0| 20 32 29 0d 09 09 09 09 | 09 6a 20 3d 20 30 3b 0d | 2).....|.j = 0;.|
|00000be0| 09 09 09 09 65 6c 73 65 | 0d 09 09 09 09 09 6a 20 |....else|......j |
|00000bf0| 3d 20 31 3b 0d 09 09 09 | 09 09 0d 09 09 09 09 69 |= 1;....|.......i|
|00000c00| 66 20 28 6a 20 3e 20 31 | 29 0d 09 09 09 09 09 6a |f (j > 1|)......j|
|00000c10| 20 3d 20 31 3b 0d 09 09 | 09 09 65 6c 73 65 0d 09 | = 1;...|..else..|
|00000c20| 09 09 09 09 6a 20 3d 20 | 30 3b 0d 09 09 09 7d 0d |....j = |0;....}.|
|00000c30| 09 09 09 0d 09 09 2f 2a | 20 4d 6f 64 75 6c 65 20 |....../*| Module |
|00000c40| 36 20 2a 2f 0d 09 09 6a | 20 3d 20 31 3b 0d 09 09 |6 */...j| = 1;...|
|00000c50| 6b 20 3d 20 32 3b 0d 09 | 09 6c 20 3d 20 33 3b 0d |k = 2;..|.l = 3;.|
|00000c60| 09 09 0d 09 09 66 6f 72 | 20 28 69 20 3d 20 31 3b |.....for| (i = 1;|
|00000c70| 20 69 20 3c 3d 20 6e 36 | 3b 20 2b 2b 69 29 0d 09 | i <= n6|; ++i)..|
|00000c80| 09 09 7b 0d 09 09 09 09 | 6a 20 3d 20 6a 20 2a 20 |..{.....|j = j * |
|00000c90| 28 6b 20 2d 20 6a 29 20 | 2a 20 28 6c 20 2d 20 6b |(k - j) |* (l - k|
|00000ca0| 29 3b 0d 09 09 09 09 6b | 20 3d 20 6c 20 2a 20 6b |);.....k| = l * k|
|00000cb0| 20 2d 20 28 6c 20 2d 20 | 6a 29 20 2a 20 6b 3b 0d | - (l - |j) * k;.|
|00000cc0| 09 09 09 09 6c 20 3d 20 | 28 6c 20 2d 20 6b 29 20 |....l = |(l - k) |
|00000cd0| 2a 20 28 6b 20 2b 20 6a | 29 3b 0d 09 09 09 09 65 |* (k + j|);.....e|
|00000ce0| 31 5b 6c 20 2d 20 31 5d | 20 3d 20 6a 20 2b 20 6b |1[l - 1]| = j + k|
|00000cf0| 20 2b 20 6c 3b 0d 09 09 | 09 09 65 31 5b 6b 20 2d | + l;...|..e1[k -|
|00000d00| 20 31 5d 20 3d 20 6a 20 | 2a 20 6b 20 2a 20 6c 3b | 1] = j |* k * l;|
|00000d10| 0d 09 09 09 7d 0d 09 09 | 09 0d 09 09 2f 2a 20 4d |....}...|..../* M|
|00000d20| 6f 64 75 6c 65 20 37 20 | 2a 2f 0d 09 09 78 20 3d |odule 7 |*/...x =|
|00000d30| 20 30 2e 35 3b 0d 09 09 | 79 20 3d 20 30 2e 35 3b | 0.5;...|y = 0.5;|
|00000d40| 0d 09 09 0d 09 09 66 6f | 72 20 28 69 20 3d 20 31 |......fo|r (i = 1|
|00000d50| 3b 20 69 20 3c 3d 20 6e | 37 3b 20 2b 2b 69 29 0d |; i <= n|7; ++i).|
|00000d60| 09 09 09 7b 0d 09 09 09 | 09 78 20 3d 20 74 20 2a |...{....|.x = t *|
|00000d70| 20 61 74 61 6e 28 74 32 | 20 2a 20 28 73 69 6e 28 | atan(t2| * (sin(|
|00000d80| 78 29 20 2a 20 63 6f 73 | 28 78 29 20 2f 20 28 63 |x) * cos|(x) / (c|
|00000d90| 6f 73 28 78 20 2b 20 79 | 29 20 2b 20 63 6f 73 28 |os(x + y|) + cos(|
|00000da0| 78 20 2d 20 79 29 20 2d | 20 31 2e 30 29 29 29 3b |x - y) -| 1.0)));|
|00000db0| 0d 09 09 09 09 79 20 3d | 20 74 20 2a 20 61 74 61 |.....y =| t * ata|
|00000dc0| 6e 28 74 32 20 2a 20 28 | 73 69 6e 28 79 29 20 2a |n(t2 * (|sin(y) *|
|00000dd0| 20 63 6f 73 28 79 29 20 | 2f 20 28 63 6f 73 28 78 | cos(y) |/ (cos(x|
|00000de0| 20 2b 20 79 29 20 2b 20 | 63 6f 73 28 78 20 2d 20 | + y) + |cos(x - |
|00000df0| 79 29 20 2d 20 31 2e 30 | 29 29 29 3b 0d 09 09 09 |y) - 1.0|)));....|
|00000e00| 7d 0d 09 09 09 0d 09 09 | 2f 2a 20 4d 6f 64 75 6c |}.......|/* Modul|
|00000e10| 65 20 38 20 2a 2f 0d 09 | 09 78 20 3d 20 31 2e 30 |e 8 */..|.x = 1.0|
|00000e20| 3b 0d 09 09 79 20 3d 20 | 31 2e 30 3b 0d 09 09 7a |;...y = |1.0;...z|
|00000e30| 20 3d 20 31 2e 30 3b 0d | 09 09 0d 09 09 66 6f 72 | = 1.0;.|.....for|
|00000e40| 20 28 69 20 3d 20 31 3b | 20 69 20 3c 3d 20 6e 38 | (i = 1;| i <= n8|
|00000e50| 3b 20 2b 2b 69 29 0d 09 | 09 09 73 70 33 28 78 2c |; ++i)..|..sp3(x,|
|00000e60| 20 79 2c 20 7a 29 3b 0d | 09 09 09 0d 09 09 2f 2a | y, z);.|....../*|
|00000e70| 20 4d 6f 64 75 6c 65 20 | 39 20 2a 2f 0d 09 09 6a | Module |9 */...j|
|00000e80| 20 20 20 20 20 3d 20 31 | 3b 0d 09 09 6b 20 20 20 |     = 1|;...k   |
|00000e90| 20 20 3d 20 32 3b 0d 09 | 09 6c 20 20 20 20 20 3d |  = 2;..|.l     =|
|00000ea0| 20 33 3b 0d 09 09 65 31 | 5b 31 5d 20 3d 20 31 2e | 3;...e1|[1] = 1.|
|00000eb0| 30 3b 0d 09 09 65 31 5b | 32 5d 20 3d 20 32 2e 30 |0;...e1[|2] = 2.0|
|00000ec0| 3b 0d 09 09 65 31 5b 33 | 5d 20 3d 20 33 2e 30 3b |;...e1[3|] = 3.0;|
|00000ed0| 0d 09 09 0d 09 09 66 6f | 72 20 28 69 20 3d 20 31 |......fo|r (i = 1|
|00000ee0| 3b 20 69 20 3c 3d 20 6e | 39 3b 20 2b 2b 69 29 0d |; i <= n|9; ++i).|
|00000ef0| 09 09 09 7b 0d 09 09 09 | 09 65 31 5b 6a 5d 20 3d |...{....|.e1[j] =|
|00000f00| 20 65 31 5b 6b 5d 3b 0d | 09 09 09 09 65 31 5b 6b | e1[k];.|....e1[k|
|00000f10| 5d 20 3d 20 65 31 5b 6c | 5d 3b 0d 09 09 09 09 65 |] = e1[l|];.....e|
|00000f20| 31 5b 6c 5d 20 3d 20 65 | 31 5b 6a 5d 3b 0d 09 09 |1[l] = e|1[j];...|
|00000f30| 09 7d 0d 09 09 09 0d 09 | 09 2f 2a 20 4d 6f 64 75 |.}......|./* Modu|
|00000f40| 6c 65 20 31 31 20 2a 2f | 0d 09 09 78 20 3d 20 30 |le 11 */|...x = 0|
|00000f50| 2e 37 35 3b 0d 09 09 0d | 09 09 66 6f 72 20 28 69 |.75;....|..for (i|
|00000f60| 20 3d 20 31 3b 20 69 20 | 3c 3d 20 6e 31 31 3b 20 | = 1; i |<= n11; |
|00000f70| 2b 2b 69 29 0d 09 09 09 | 73 71 72 74 28 65 78 70 |++i)....|sqrt(exp|
|00000f80| 28 6c 6f 67 28 78 29 20 | 2f 20 74 31 29 29 3b 0d |(log(x) |/ t1));.|
|00000f90| 09 09 09 0d 09 09 73 74 | 6f 70 54 69 6d 65 20 3d |......st|opTime =|
|00000fa0| 20 54 69 63 6b 43 6f 75 | 6e 74 28 29 3b 0d 09 09 | TickCou|nt();...|
|00000fb0| 65 6c 61 70 73 65 20 3d | 20 28 64 6f 75 62 6c 65 |elapse =| (double|
|00000fc0| 29 20 28 73 74 6f 70 54 | 69 6d 65 20 2d 20 73 74 |) (stopT|ime - st|
|00000fd0| 61 72 74 54 69 6d 65 29 | 20 2f 20 36 30 2e 30 3b |artTime)| / 60.0;|
|00000fe0| 0d 09 09 6b 77 68 65 74 | 20 3d 20 31 30 30 30 2e |...kwhet| = 1000.|
|00000ff0| 30 20 2f 20 65 6c 61 70 | 73 65 3b 0d 09 09 09 09 |0 / elap|se;.....|
|00001000| 0d 09 09 70 72 69 6e 74 | 66 28 22 45 78 74 65 6e |...print|f("Exten|
|00001010| 64 65 64 20 50 72 65 63 | 69 73 69 6f 6e 20 4b 77 |ded Prec|ision Kw|
|00001020| 68 65 74 73 74 6f 6e 65 | 73 2f 73 65 63 20 3d 20 |hetstone|s/sec = |
|00001030| 25 36 2e 32 66 5c 6e 5c | 6e 22 2c 20 6b 77 68 65 |%6.2f\n\|n", kwhe|
|00001040| 74 29 3b 0d 09 09 70 72 | 69 6e 74 66 28 22 45 6e |t);...pr|intf("En|
|00001050| 74 65 72 20 61 20 63 61 | 72 72 69 61 67 65 20 72 |ter a ca|rriage r|
|00001060| 65 74 75 72 6e 20 74 6f | 20 65 78 69 74 5c 6e 5c |eturn to| exit\n\|
|00001070| 6e 22 29 3b 0d 09 09 73 | 63 61 6e 66 28 22 63 22 |n");...s|canf("c"|
|00001080| 2c 20 63 68 29 3b 0d 09 | 7d 00 00 00 00 00 00 00 |, ch);..|}.......|
|00001090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000010f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001100| 00 00 01 00 00 00 01 16 | 00 00 00 16 00 00 00 46 |........|.......F|
|00001110| 6e 6a 30 03 61 00 00 bc | 31 c4 0a 0a 42 a7 a8 d8 |nj0.a...|1...B...|
|00001120| 2c 17 42 a7 a8 d8 2f 0a | 42 67 3f 07 2f 06 a8 ef |,.B.../.|Bg?./...|
|00001130| 0b 42 65 6e 63 68 4d 61 | 72 6b 2e 63 02 00 00 00 |.BenchMa|rk.c....|
|00001140| 54 45 58 54 4b 41 48 4c | 01 00 00 10 00 c0 00 00 |TEXTKAHL|........|
|00001150| 00 00 54 45 58 54 4b 41 | 48 4c 01 00 00 10 00 c0 |..TEXTKA|HL......|
|00001160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001170| 00 00 9e 59 ce 1e 00 00 | 10 09 00 00 01 5c 67 08 |...Y....|.....\g.|
|00001180| 30 03 61 4e 30 14 61 4a | 4c df 1c f8 4e 5e 20 5f |0.aN0.aJ|L...N^ _|
|00001190| de fc 00 12 4e d0 45 ee | ff f8 2f 0a a8 8b 30 1a |....N.E.|../...0.|
|000011a0| d0 5a 0c 52 00 0e 66 02 | 55 52 54 4a d1 52 4e 75 |.Z.R..f.|URTJ.RNu|
|000011b0| 30 2e ff fe 4a 11 67 02 | 70 24 4e 75 0c 44 00 1f |0...J.g.|p$Nu.D..|
|000011c0| 6e 0a 20 53 20 28 00 0a | 09 00 67 04 08 00 00 00 |n. S (..|..g.....|
|000011d0| 4e 75 48 e7 18 00 36 00 | 67 3c 34 38 0a 0a 78 01 |NuH...6.|g<48..x.|
|000011e0| 30 04 20 53 61 00 01 e8 | 61 c6 b8 03 67 06 d4 40 |0. Sa...|a...g..@|
|000011f0| 52 44 60 ec 12 28 00 01 | 41 f8 09 fa 22 6e 00 10 |RD`..(..|A..."n..|
|00001200| 00 00 00 04 00 06 00 04 | 00 00 00 0a 00 09 07 50 |........|.......P|
|00001210| 72 6f 46 6f 6e 74 00 00 | 01 00 00 00 01 16 00 00 |roFont..|........|
|00001220| 00 16 00 00 00 46 00 03 | 12 e2 02 94 00 00 00 1c |.....F..|........|
|00001230| 00 46 00 01 45 54 41 42 | 00 00 00 12 45 46 4e 54 |.F..ETAB|....EFNT|
|00001240| 00 00 00 1e 03 ec ff ff | 00 00 00 00 00 03 12 3e |........|.......>|
|00001250| 03 eb ff ff 00 00 00 08 | 00 03 12 3a 00 00 00 00 |........|...:....|
|00001260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+